-- background: 3463 from stack: in
-- bmap block id: 4274
-- flags: 0000
-- background id: 0
-- name: Carmina
----- HyperTalk script -----
on closeCard
  CleanScreen
  pass closeCard
end closeCard



-- part 9 (field)
-- low flags: 03
-- high flags: 2000
-- rect: left=40 top=46 right=293 bottom=258
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 203
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: 


-- part 17 (field)
-- low flags: 03
-- high flags: 2000
-- rect: left=271 top=46 right=293 bottom=486
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 203
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: 


-- part 18 (button)
-- low flags: 00
-- high flags: 2000
-- rect: left=0 top=308 right=342 bottom=32
-- title width / last selected line: 0
-- icon id / first selected line: 28961 / 28961
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: 
----- HyperTalk script -----
on mouseUp
  visual zoom in
  go stack "library"
  if result() is empty then
  else
    beep
  end if
end mouseUp


-- part 19 (button)
-- low flags: 00
-- high flags: 2000
-- rect: left=1 top=171 right=203 bottom=25
-- title width / last selected line: 0
-- icon id / first selected line: 28957 / 28957
-- text alignment: 1
-- font id: 216
-- text size: 9
-- style flags: 0
-- line height: 12
-- part name: English
----- HyperTalk script -----
on mouseUp
  if the optionKey is down then
    visual zoom open slow
    go cd "Bar"
  else
    get last word of id of this cd
    visual dissolve
    if it is 5823 then go cd id 7997
    if it is 5933 then go cd id 10504
    if it is 2191 then go cd id 11791
    if it is 8768 then go cd id 12473
  end if
end mouseUp


-- part 20 (button)
-- low flags: 00
-- high flags: 2000
-- rect: left=451 top=289 right=308 bottom=482
-- title width / last selected line: 0
-- icon id / first selected line: 6720 / 6720
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Return
----- HyperTalk script -----
on mouseUp
  visual wipe right
  go cd id 5823
end mouseUp


-- part 21 (button)
-- low flags: 00
-- high flags: 2000
-- rect: left=229 top=283 right=308 bottom=254
-- title width / last selected line: 0
-- icon id / first selected line: 15420 / 15420
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Prev
----- HyperTalk script -----
on mouseUp
  send "arrowkey left" to this cd
end mouseUp


-- part 22 (button)
-- low flags: 00
-- high flags: 2000
-- rect: left=273 top=283 right=308 bottom=298
-- title width / last selected line: 0
-- icon id / first selected line: 16560 / 16560
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Next
----- HyperTalk script -----
on mouseUp
  send "arrowkey right" to this cd
end mouseUp